home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 162
/
162.d81
/
b.font expander
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
1KB
|
13 lines
10 restore:reada:bo=peek(66)*256+peek(65)+3:dv=peek(186):ifdv<8thendv=8
20 ce=bo+3:bl=bo+6:co=bo+9:sw=bo+12:c2=bo+15:dy=bo+18:sysbo:poke53272,23
50 sysce,16,"[197][160][216][160][208][160][193][160][206][160][196][160][197][160][210] [213] [212] [201] [204] [201] [212] [217]":sysce,18,"[194]y [203]en [210]obinson
70 [143] sysce,19,"(len) 1997 by mid$&asc (NULL)ublishing
80 remsysce,20,"[212]his [208]rogram [201]sn't [208]ublic [196]omain
100 [158]bl,"expander.tb",dv,9[172]4096
105 [158]bl,"expand.calc",dv,5[172]4096[170]4[172]256
109 [158]bl,"expander.o",dv,5[172]4096
110 [158]bl,"f.brick",dv,8[172]4096
120 [158]bl,"f.font1",dv,6[172]4096[170]8[172]256
5000 [158]dy,"exp2",dv
6000 [131]0